{ The creation and connection procedure. This connects the Delphi 
   application via OLE to the IMSI SDK. }
procedure TPreviewForm.FormCreate(Sender: TObject);
begin
    { The following variable were declared as Variant in the form's Type declarations }
     SDKApp := NULL;
     SDKViews := NULL;
     TheView := NULL;
     SDKDrawings := NULL;
     TheDrawing := NULL;

    { Now connect to the SDK OLE server. The 'IMSIGX.Application' is the 
     Main User Type of the  CLSID. }
     SDKApp := CreateOleObject('IMSIGX.Application'); 
 
    { Open the Drawings Collection to hold our drawings. This uses IDispatch to call 
     the get_Drawings property in the IMSI SDK }
     SDKDrawings := SDKApp.Drawings;  

    { The application is now set up to use the SDK to open and manipulate drawings, 
      objects (circle, rectangle), and views }

     TCFileName := '';
end;